home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 2 (Reseller) / Apple R&P Lib Reseller v2.0.iso / 4-Fonts & Software / Demo Software / AppMaker / Demo AppMaker™ / Demo AppMaker™.rsrc / TmpC_208_ModalDialog.txt < prev    next >
Text File  |  1989-04-09  |  1KB  |  2 lines
  1. # (decoded with TMPL 13671)
  2. /* %filename% -- Modal dialog *//* Created %date% %time% by AppMaker */%If MPW%#include <Types.h>#include <Quickdraw.h>#include <Controls.h>#include <Dialogs.h>#include <Events.h>#include <Lists.h>#include <Menus.h>#include <TextEdit.h>%end if%#include "ResourceDefs.h"#include "DialogAids.h"#include "%unitname%.h"#define nil            0L%ConstItems%%If MPW%#pragma segment %unitname%%end if% %ItemProcs%%MaybeFilter%/*----------*/Boolean Get%dlogname% (%dlogname%)%dlogname%Rec%    %*%dlogname%;{    DialogPtr        theDialog;    Boolean            result;    Boolean            done;    short            itemNr;    register %dlogname%Ptr    info;    InitCursor ();    theDialog = GetNewDialog (%dlogname%ID, nil, (WindowPtr) -1L);    SetPort (theDialog);    info = %dlogname%;    %SetItems%    ShowWindow (theDialog);    OutlineButton (1);    done = false;    while (!done) {        %EnableItems%        ModalDialog (%Filtername%, &itemNr);        switch (itemNr) {        %HandleItems%        } /*switch*/    } /*while*/    %FinishItems%    DisposDialog (theDialog);    return (result);} /*Get%dlogname%*/